home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib06.dsk / RANDOM BUT PREDICTABLE.bas < prev    next >
BASIC Source File  |  2023-02-26  |  117b  |  6 lines
  1. 10 A =  PEEK(78): REM  78-$4E
  2. 20  REM  PROTECT AGAINST A=0
  3. 30 B = A +1
  4. 40  FOR X = 1 TO B
  5. 50 NUM =  RND(1)
  6. 60  NEXT X